www.gusucode.com > Neutrosophic logic toolbox Package_ Neutrosophic Matrices > Neutrosophic logic toolbox Package_ Neutrosophic Matrices/@nm/uppereng.m

    function SG=uppereng(A);
% energy of an single valued neutrosophic matrix A  
% "A" have to be single valued neutrosophic  matrix - "nm" object:
%In the Name of ALLAH
% neutrosphic logic toolbox for computing single valued neutrosophic Matrices 
% Copyright (C) 2015-2019 Broumi said 
%for for details see the refrence:  
%Said Broumi, Le Hoang Son, Assia Bakali, Mohamed Talea, Florentin Smarandache,
%Ganeshsree Selvachandran, Computing Operational Matrices in Neutrosophic Environments:
%A Matlab Toolbox,Neutrosophic Sets and Systems, 18,2017,pp.58-66.
% neutrosphic logic toolbox for computing single valued neutrosophic Matrice comes 
% This is free software, and you are welcome to redistribut;see license.txt for details.
enter('k')
a.m=sqrt(sum((eig(A.m)).^2).*k)
a.i=sqrt(sum((eig(A.i)).^2).*k)
a.n=sqrt(sum((eig(A.n)).^2).*k)
SG=nm(a.m,a.i,a.n);